perm filename BUG[DOC,TOB] blob
sn#225656 filedate 1976-07-13 generic text, type T, neo UTF8
00100 Dear John
00200 Here is an example where BAIL loses printing context
00300 when there is an intervening procedure.
00400
00500
00600 This is BUG[DOC,TOB]
00700
00800 AL DOC,TOB
00900 RUN LINKC
01000 INPUT FILE NAME A3A
01100 COUNT!EDGE 18461
01200 X1 1
01300 X2 512
01400 Y1 1
01500 Y2 512
01600 DIFF 21.60 *cr <cr>
01700 SET WINDOW Y or N Y
01800 X1W 1.000 *cr <cr>
01900 X2W 512.0 *cr 256
02000 Y1W 1.000 *cr <cr>
02100 Y2W 512.0 *cr 256
02200
02300 Bail .... LINKC.BAI
02400 End of Bail Initialization
02500 #55 + 0
02600 1: BREAK("STORE");
02700 1: BREAK("GC");
02800 $P
02900 $X
03000 $X
03100 $X
03200 here it has lost printing context
03300 $X
03400